home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 1997 #1 / Amiga Plus CD - 1997 - No. 01.iso / pd / programmierung / tds / convsrc / sas2msg.c < prev    next >
C/C++ Source or Header  |  1995-11-01  |  1KB  |  62 lines
  1. /* SAS2Msg.c */
  2.  
  3. #include <exec/types.h>
  4. #include <dos/stdio.h>
  5. #include <clib/dos_protos.h>
  6.  
  7. #include <stdio.h>
  8. #include <string.h>
  9.  
  10. static UBYTE version[] = "$VER: SAS2Msg 1.00 (28.01.94)";
  11.  
  12. struct ErrorMsg {
  13.   BOOL warn;
  14.   LONG row,col;
  15.   UBYTE fileName[256];
  16.   UBYTE errStr[256];
  17. };
  18.  
  19.  
  20. void 
  21. PrintMsg(struct ErrorMsg *msg)
  22. {
  23.   printf("<%s> %d %c <%s>\n",msg->fileName,msg->row,(msg->warn ? 'W' : 'E'),msg->errStr);
  24. }
  25.  
  26.  
  27. /*
  28. Lattice 5.XX SAS 6.XX
  29.  
  30. test.c 6 Warning 57: semi-colon expected
  31. test.c 6 Error 2: unexpected end of file
  32. test.asm 2 Error: unrecognized opcode
  33. test.asm 4 Error: data generation must occur in reloc section
  34. */
  35.  
  36. BOOL
  37. ConvertMsg(struct ErrorMsg *msg)
  38. {
  39. UBYTE line[256];
  40.  
  41.   while (ReadLn(line,255)) {
  42.     if (sscanf(line,"%s %d %[^\n]",msg->fileName,&msg->row,msg->errStr) == 3) {
  43.       msg->warn = (strstr(line,"Warning") != NULL);
  44.       return(TRUE);
  45.     }
  46.   }
  47.   return(FALSE);
  48. }
  49.  
  50.  
  51. int
  52. main(int argc,UBYTE *argv[])
  53. {
  54. struct ErrorMsg errMsg;
  55.  
  56.   while (ConvertMsg(&errMsg))
  57.     PrintMsg(&errMsg);
  58.  
  59.   return(0);
  60. }
  61.  
  62.